﻿Imports DataSet_ohlTableAdapters
Imports DataSet_ohl
Imports System.Data

Partial Class Empadres_ConEmpadres
    Inherits System.Web.UI.Page
    Private dataSet As DataSet

    Dim TA_Movtos As New movtosTableAdapter
    Dim DT_Movtos As New movtosDataTable

    Dim TA_Movtos2 As New movtos2TableAdapter
    Dim DT_Movtos2 As New movtos2DataTable

    Protected Sub Empadres_ConEmpadres_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            rbtMovtos.SelectedIndex = 0
            rbtMovtos_SelectedIndexChanged(rbtMovtos, e)
        End If
    End Sub

    Protected Sub rbtMovtos_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles rbtMovtos.SelectedIndexChanged
        DT_Movtos2 = TA_Movtos2.GetMovsBySexo(rbtMovtos.SelectedValue)
        gvAnimal.DataSource = DT_Movtos2.Select()
        gvAnimal.DataBind()
    End Sub

    Protected Sub btnConsulta_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnConsulta.Click

    End Sub
End Class
